﻿Public Class dialog_newEA

    Public Shared selection As String

    Private Sub button_entity_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button_entity.Click
        selection = "entity"
        Me.Close()
    End Sub

    Private Sub button_attribute_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button_attribute.Click
        selection = "attribute"
        Me.Close()
    End Sub

    Private Sub button_domainvalue_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button_domainvalue.Click
        selection = "domainvalue"
        Me.Close()
    End Sub

    Private Sub button_cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button_cancel.Click
        selection = "cancel"
        Me.Close()
    End Sub
    Public Function getSelection() As String
        Return selection
    End Function
End Class